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أ السؤال الأول: ضع علامة )١/(‏ أمام العبارة الصحيحة وعلامة (*) أمام العبارة الخطأ: 
-١‏ يؤخذ على لغة ۷8.٤۲‏ التعامل مع أنواع مختلفة من البيانات. 
۲- جميع البيانات التي يتم إدخالها في برنامج بلغة 8.۴۲ يتم تخزينها مؤقتًا في ذاكرة الكمبيوتر. 
۳- جميع أنواع البيانات التي يتم حفظها في الذاكرة تشغل نفس المساحة التخزينية. 
-٤‏ المبرمج الجيد الذي يُحسن ترشيد المساحة التخزينية في ذاكرة الكمبيوتر. 
5- يُصنف قيمة مجموع درجات الطالب ضمن البيانات الرقمية الصحيحة. 
]| 1 يُصنف قيمة اسم الطالب ضمن البيانات الرقمية المتنوعة. 
٠‏ “- يُصنف قيمة نوع الطالب "ذكر" أم "أنثى" ضمن البيانات المتنوعة "المنطقية". 
1[ ۸- صورة الظالب يمكن تصنيقها ضمن البيانات الحرفية: 
4- قيمة مرتب الموظف يمكن تصنيفها ضمن البيانات الرقمية الغير صحيحة. 
- كل بيان يُخزن في ذاكرة الكمبيوتر يشغل مساحة تخزينية ومدى معين حسب نوع البيان. 
-١١ |]‏ نوع البيان يحُدد حيز التخزين الذي يشغله في ذاكرة الكمبيوتر ومعرفة الحد الأدنى والأقصى لقيمته. 
-١ ١‏ يُقصد بالمتغيرات في لغة 8.٤۲‏ مخازن بذاكرة الكمبيوتر لها اسم ونوع. 
١‏ ۳- الإعلان عن متغير في لغة 8.۴۲ يعني تحديد اسمه ونوع البيانات. 
4- الإعلان عن المتغيرات مسألة شكليةء لأن لغة 1/8.07 تتعرف على المتغيرات وتحدد نوعها تلقائيًا. 
-١5 |‏ الجملة التالية 56/108 Dim _03606© As‏ للإعلان عن متغير باسم 51108 ونوعه .۴_„a me‏ 
-١‏ جملة الإعلان عن المتغيرات يتحدد فيها اسم المتغير ونوعه وقيمته الثابتة. 
-١١17 |‏ 55016 يعتبر اسم متغير صحيح. 
- يستخدم أمر 00 في الإعلان عن المتغيرات. 
' 19- يستخدم أمر 00054 في الإعلان عن المتغيرات. 


( الثوابت في لغة 1/8.0/217 عبارة عن مخازن في ذاكرة الكمبيوتر لها اسم وقيمة تتغير أثناء سير البرنامج.‎ -٠ 


-7١ |‏ الخطأ في نتيجة حساب أي معادلة يعتبر خطأ لغوي ,6/0 «5[/013. 
١‏ ۲- الخطأ الذي يظهر أثناء تشغيل أو تنفيذ برنامج ۷8.۸٤۲‏ يطلق عليه خطأ لغوي 6/06 .Sy tax‏ 
ا القيمة النهائية للمتغير × بعد تنفيذ المعادلة التالية (4 * 2 + 3 = ») هي 3 
| 14- باستخدام الدالة 1/00 في التعبير (3 1100 21) يكون الناتج ۷. 
5- في جملة ماع ... 7560 ... | توضع هواع على سطر بمقردها. 
7- التعبير الشرطي له ناتج منطقي إما (صواب عدم7 أو خطأ عواهع). 
۷- لا يسمح 1/8.0/57 بكتابة جملة ۴| على سطر واحد بدون كتابة ۴| 00. 
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-۳ 


-٤ 


o 


كا 


۷ | 


۴۸ ٩ 


-۳۹ | 


-٤١ 


نستخدم جملة عواع ... 7860 ... ۴| في حالة وجود بديل (اختيار) واحد فقط. ) 
إذا كان ناتج التعبير الشرطي خطأ ©3156 يتم تنفيذ الأوامر التي تلي الأمر ۲۲۵ وحتى 6!  .800‏ ( 
الدالة 0/100 تستخدم لإيجاد باقي القسمة الرقمية. ١‏ 
تنتهي جملة التفرع ۴| بالأمر م50. ١‏ 
عدد اختبارات التفرع الممكنة مع استخدام جملة عواع ... 150 ... ۴| هو ۲. ) 
المعامل (&) هو أحد معاملات المقارنة. ) 
تستخدم جملة 0356 ... 56160 في حالة وجود متغير واحد مع وجود شروط كثيرة. ) 
تستخدم جملة "٥×٤‏ ... ۴0۲ في حالة عدم معرفة عدد مرات التكرار مسبقًا. م 
عدم استعمال مع5 يؤدي إلى عدم زيادة قيمة متغير العداد نهائيًا. ) 
كلمة ,مع تمثل بداية التكرار بينما ١×‏ تمثل نهاية التكرار. ) 


جملة التكرار م00 ... ها۷ 00 تستخدم لتكرار تنفيذ مجموعة من الأوامر إذا كان الشرط صحيحًا. ( 


معين. ) 
تستخدم جملة ماع ... 776 ... ۴| في حالة وجود أكثر من اختيارين للتفرع. ) 
كلمة مهك اختيارية في جملة التكرار م100 ... عاتحاللا .D0‏ ) 
الإعلان عن الثوابت يتم في نطاق تصنيف النموذج. ) 
الإجراء هو مجموعة من الأوامر والتعليمات له اسم معين. ) 
الإجراء انك له قيمة راجعة أي يعود بقيمة. ) 
لا يجوز استدعاء الإجراء طك أكثر من مرة واحدة في نافذة الكود. ) 
يشترط عند الإعلان عن الإجراءات أن تستخدم وسيط 53]30646/5 واحد فقط. ) 
يتم استقبال قيم من خارج الإجراء من خلال الوسائط ممص .ara‏ ) 
الإجراء انك لا يعود بقيمة أما الدالة ام۴ تعود بقيمة. ) 
الإجراء مإuلمع‏ مم عبارة عن مجموعة من أوامر وتعليمات يتم تكرارها عدد محدد من المرات. ( 


الغرض من استخدام الإجراءات 5©نا0عع820 تكرار كتابة كود معين عدة مرات في البرنامج. ( 


مجموعة الأوامر والتعليمات التي يتم وضعها تحت اسم معين» وعند تنفيذها تعود بقيمة نطلق عليها إجراء. ( 


عندما يكون لدينا كود معين نرغب في تكراره في أكثر من موضع داخل التصنيف نستخدم الأجراء. ( 
عند استدعاء إجراء باسم (0.05) 73*65 فإن القيمة بين القوسين يطلق عليها J .Aع u٢‏ 
الإعلان عن دالة يبدأ ب اںu؟‏ وينتهي ب bاں؟‏ 0مع. ) 
نلجأ لاستخدام الدالة مم۴ إذا كان لدينا كود سينتج عنه قيمة نحتاجها. ) 

) 


يؤخذ على لغة ۷8.۸۴۲ أنها سمحت للمبرمج الإعلان عن دوال وإجراءات أخرى يعدها بنفسه. 


اک کے ا کے کے حا ص کے د د د هج > 3 


' 1ت التعدي الإلكتروني يتم من خلال وسائط إلكترونية مثل مواقع التواصل الاجتماعي. ) ( 


| 58 تمشيًا مع قواعد الاستخدام الآمن يفضل أن تضع كلمة مرور سهلة للبريد الإلكتروني الخاص بك حتى تستطيع !| 
| کرم ( ) 0 
۹- الاستثناء الإلكتروني يعني تتبع شخص معين في كافة وسائل التواصل الإلكترونية. ١‏ 6 1 

1 ( ) الملاحقة الإلكترونية يقصد بها إرسال رسائل إلكترونية تحمل تهديد أو وعيد لشخص أو أكثر.‎ ٠ 

| 


| السؤال الثاني: اختر الإجابة المناسبة لكل مما يلى: 1 


-١‏ قيمة أسعار الأدوات المكتبية يمكن تصنيفها كبيانات ا 


أ- زقمية صحيحة ب- رقمية غير صحيحة ج- متنوعة 

۲- قيمة أسماء المواد الدراسية يمكن تصنيفها كبيانات ..... 

أ- متنوعة ب- رقمية غير صحيحة ج- حرفية 

۳- نوع البيان المُخزن مؤقنًا في ذاكرة الكمبيوتر يحدد ااا ا ا 
أ- حيز تخزيني ومدى قيمته ١‏ ب- اسم وحيز تخزيني ج- حيز تخزيني وقيمته : 


-٤‏ الصيغة الصحيحة للإعلان عن متغير المرتب 53130 هي 


Dim Salary As Decimal ج-‎ Dim Salary As Byte ب-‎ Dim Salary As Integer أ-‎ 
الصيغة الصحيحة للإعلان عن المتغير العنوان ا٣ هي ان‎ -٥١ 
أ‎ Dim City As Decimal ج-‎ Dim City As Byte ب-‎ Dim City As String -Î 


-٦‏ الصيغة الصحيحة للإعلان عن متغير الاسم م۳ ۴_4 هي ست 
أ- Dim F_Name As Integer‏ ب- Dim F_Name As String‏ ج- Dim F_Name As Decimal‏ 
۷- الصيغة الصحيحة للإعلان عن متغير النوع 6ع00ع66 هي e‏ 

Dim Gender As Boolean ج-‎ Dim Gender As Integer بد‎ Dim Gender As Decimal أ-‎ 
الخطأ الذي يظهر بعد تشغيل برنامج بلغة 8.۴1 يسمى ا‎ -۸ 

Runtime Error ج-‎ Logical Error ب-‎ Syntax Error -Î 
الخطأ الذي يظهر أثناء كتابة كود بلغة 1/8.01 يسمى ج‎ -4 

Runtime Error ج-‎ Logical Error ب-‎ Syntax Error أ-‎ 


-١‏ الخطأ في ناتج تشغيل كود بلغة ۷8.۴٤۲‏ يسمى پا 


1 Runtime Error ج-‎ Logical Error ب-‎ syntax Error -İ 


| 1 
نا 


ا -١‏ الناتج النهائي للمتغير ۷ للمعادلة 
| الك ؟ ته ١‏ ج ٠١‏ 
1 - جملة الإعلان عن متغير 56108 85 × ص0 تعني الإعلان عن E‏ 
| أ- متغير اسمه × ونوعه حرفي 51/108 
ب- متغير اسمه 511108 ونوعه × 
1 ج- متغير مجهول ليس له اسم ونوعه م5110 
-1١ |‏ جملة الإعلان الصحيحة عن متغير رقمي غير صحيح اسمه ۷ هي 5 
1 أ- As Decimal‏ لا Dim‏ ب- Y As Decimal‏ ج- As Decimal‏ لا Const‏ 
-٠١‏ اختر الاسم الصحيح للمتغير اسم الطالب 58 
أ- st_name‏ ب- st name‏ ج- Name**‏ 
-٠١ ][‏ اختر الاسم الصحيح لمتغير عنوان الموظف 57 
أ- SCairo‏ ب- E_Address‏ ج- (Address)‏ 


Dim Pi As Single أ-‎ 


Dim Pi As Single = 3.14 ب-‎ 
Const Pi As Single = 3.14 ج-‎ 

۷- الإعلان عن متغير عدد أفراد الأسرة راه 
أ- 2 = Dim C_Family As Single‏ 
ب- 2 = Const C_Family As Integer‏ 
ج- 2 = Dim C_Family As Integer‏ 


syntax Error أ- خطألغوي‎ 


ب- خطأ منطقي 0۲٣٣ع‏ 0811| 
ج- خطأ أثناء التشغيل Runtime Error‏ 


۷= 12-2 + 4 / 2 الناتج النهائي للمعادلة‎ ٠ 


-١‏ معامل المقارنة التالي يعبر عن عدم التساوي 


7- عند الإعلان عن الثابت الرياضي (ط) نستخدم الكود .... 


- إذا وجد خطأ في نتيجة حساب مساحة مستطيل في برنامج» يعتبر هذا الخطأ 


C_۴‏ بقيمة ابتدائية ۲ هو 


15- رسالة الخطأ التي تظهر عند كتابة الكود هر8 85 × 0157605108 يمكن تصنيفها خطأ ...... 
| أ- لغري مومع syntax‏ ب- منطقي E۲۴0۲‏ اوءأعما ج- تشغيل Runtime Error‏ 
ل 


ai هو‎ 


> ۱۲ فت ۷ ج- ٩‏ 


أ => بنا چ ج- =< 


5 


۲- نوع القيمة في التعبير الشرطي التالي 8 = ۸ هي ا 


قيمة من متغير ب- قيمة مجردة 


۳- نوع القيمة في التعبير الشرطي التالي 2 * 3 + 8 - 8 هي re‏ 


أ- 


3 


د 
aê‏ 

أد 
Î‏ 


2 


قيمة من متغير آخر ب- قيمة مجردة 
إذا كانت قيمة 60 = ١‏ وقيمة 45 = M‏ فإن ناتج الشرط M‏ =< ا يكون ease‏ 
True‏ ب- False‏ 
المتغير الذي يستخدم في جملة ×" ... ۴۵۴ يسمى 15 
Text‏ ب- Byte‏ 
الكلمة المحجوزة التي تستخدم في إنشاء سطر جديد هي E‏ 
vbcrlf‏ ب- Dim‏ 


€ 


€ 


قيمة من تعبير حسابي 


Null 


Counter 


REM 


۷- يتوقف التكرار في الجملة 2 م566 10 0غ 5 = M‏ +0 عندما تصبح قيمة المتغير M1‏ ....... 


م ۸- 


5 
ك 


ب- أصغر من قيمة النهاية 


أكبر من قيمة النهاية 


عدد مرات التكرار في الجملة الآتية 3 م586 10 70 2 = × ۴0۲ يكون 555 
° په 7 
.......... الإلكتروني عبارة عن تجاهل شخص أو أكثر من خلال وسائط إلكترونية. 


التشهير ب- التهديد 
.......... الإلكتروني هو إرسال رسائل إلكترونية تهديدية المحتوى. 
التشهير ب- التهديد 


.......... الإلكتروني عبارة عن نشر معلومات عن شخص أو أكثر بشكل مسيئ. 
الاستثناء ی اوو 
. هي رسائل عدائية موجهة ضد شخص أو أكثر. 
التهديد ب- المضايقات الإلكترونية 


......... عبارة عن سلوك عدواني متعمد باستخدام الوسائط الإلكترونية. 
المضايقات الإلكترونية ب- التعدي الإلكتروني 


€ 


€ 


€ 


€ 


€ 


“€ 
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التهديد 


التشهير 


التهديد 


أهم الأجزاء والملاحظات 
ه أنواع البيانات ype‏ 0248: 
-١‏ بيانات رقمية صحيحة „(Integer - Byte - Long - Short)‏ 
؟- بيانات رقمية غير صحيحة (كسور أو عشرية) (Single - Decimal - Double)‏ 
؟- بيانات حرفية (String - Char)‏ 
-٤‏ بيانات متنوعة (Boolean - Date - Object)‏ 
- 200515: أمر الإعلان عن الثوابت - ذ0: أمر الإعلان عن المتغيرات 
- 811 : لكتابة الملاحظات داخل الكود - ااا لإنشاء سطر جديد 


- 016: يعبر عن نافذة النموذج الحالية ع سنال الرريظ كل اوجن 
٠‏ الصيغة العامة للإعلان عن الثوابت: 


Const Constant_Name As Data Type = Value 


٠‏ الصيغة العامة للإعلان عن المتغيرات: 


Dim Variable_Name As Data Type [= Initial Value] 


:IF ... Then جملة‎ ® 


If Conditional Expression )تعبير شرطي)‎ Then 


Code 


End If 


:IF ... Then ... Else جملة‎ e 
If Conditional Expression (تعبیر شرطي)‎ 0 


الكود إذا تحقق الشرط Code1‏ 


2 اس 


Else 


Code2 


الكود إذا لم يتحقق 
الشرط میا۴ End if‏ 


3 ص س ص ے ص ص ص د ص د کے ص 


:Select ... Case جملة‎ e 


Select Case Variable 


Case value1 
الكود الذي سينفذ إذا كان قيمة المتغير‎ 
١ مساوية للقيمة‎ 


الكود الذي سينفذ إذا كان قيمة المتغير 

مساوية للقيمة ۲ 
Case value3‏ 
الكود الذي سينفذ إذا كان قيمة المتغير | مهمع 

مساوية للقيمة ٣‏ 
Case else‏ 
الكود الذي سينفذ إذا كانت قيمة 
المتغير غير مساوية لكل القيم السابقة 


الصيغة العامة لهذه الجملة: 


For Variable = Start Value To End Value Step Add Value 
الأوامر المطلوب تكرار تنفيذها | مهلمع‎ 


نهاية التكرار | ]bleؤVaria[ Next‏ 


تعبير شرطي Do While + Conditional Expression‏ 
الأوامر المطلوب تكرار تنفيذها ... C06‏ ... 
نهاية جملة التكرار ممما 


ه الإعلان عن الإجراء ااك (لا يعود بقيمة): 


اسم الإجراء بداية الإجراء 


Sub + Sub Name + (Parameters) 
... 6006 ... الأوامر والتعليمات المطلوب تنفيذها‎ 
End Sub نهاية الإجراء‎ 


« الإعلان عن الدالة رما†عمن۴ (تعود بقيمة): 


الوسائط اسم الدالة بداية الإعلان 
Function + Function Name + (Parameters) As Data Type‏ 


الأوامر والتعليمات المطلوب تنفيذها ... 6006 ... 
القيمة الراجعة Return Value‏ 
نهاية الدالة End Function‏ 


ه أولويات تنفيذ العمليات الحسابية* 

-١‏ تنفيذ العمليات داخل الأقواس من الداخل إل الخارج. 

-"١‏ تنفيذ الأس. 

1- تنفيذ عمليات الضرب أو القسمة من اليسار إلى اليمين أيهما اولا. 
4- تنفيذ عمليات الجمع أو الطرح من اليسار إلى اليمين أيهما أولا. 


0-7 


ْ اختبارات المحافظات 


0 ) القيمة الراجعة للدالة (×) هي عاع510 كما هو موضح في إعلانها:‎ -١ 
Function X (ByVal Y As Integer , ByVal Z As Integer) As Single 
.١١ القيمة النهائية للمتغير (×) بعد تنفيذ العملية التالية 4 * 2 + 3 =× هي‎ -١ ٠ 
جميع أنواع البيانات التي يتم حفظها في الذاكرة تشغل نفس المساحة التخزينية.‎ -۳ | 
الملاحقة القانونية يقصد بها إرسال رسائل إلكترونية تحمل تهديد أو وعيد لشخص أو أكثر.‎ -٤ 
يستخدم أمر 00054 في الإعلان عن المتغيرات.‎ -٥ 
.800 |۴ يمكن كتابة جملة ۴| في سطر واحد بدون‎ -1 


ص ص ص ص 
ةا حك د ت 


| السؤال الثاني: أ- اختر الإجابة المناسبة لإكمال العبارات التالية: 
-١‏ قيمة أسعار الأدوات المكتبية يمكن تصنيفها كبيانات 


أ- رقمية صحيحة ب- رقمية غير صحيحة ج- متنوعة 
؟- رسالة الخطأ التي تظهر عند كتابة الكود م8 85 × 017760510 يمكن تصنيفها خطأ e‏ 
أ Syntax Error‏ ب- Logical Error‏ ج- Runtime Error‏ 
۳- جملة .......... تستخدم عندما يكون التفرع معتمدًا على قيمة متغير واحد وهناك عدة شروط. 
[ أ- Select ... Case‏ ب- If ... Then Error‏ ج- For ... Next‏ 
-٤‏ يعرف .......... بأنه مجموعة من الأوامر والتعليمات تحت اسم ماء يمكن استدعائه بهذا الاسم ليتم تنفيذ هذه الأوامر 
والتعليمات. 
1 أ- الإجراء ب- الوسيط ج- المتغير 


-٥‏ الإعلان عن متغير عدد أفراد الأسرة راص هC_۴‏ بقيمة ابتدائية 2 هو ج 
أ- 2 = Dam C_Family As Single‏ 
ب- 2 = Const C_Family As Integer‏ 
ج- 2 = Dim C_Family As Integer‏ 
5- اشترك أحد الأشخاص في أحد مواقع التواصل الاجتماعي» كلما أرسل أحد الأعضاء أو حاول إجراء محادثة فورية 


| أ الاستثناء الإلكتروني ب- التهديد الإلكتروني ج- التخفي الإلكتروني 


أسماء المتغيرات 


U_Name 


U_Gender 


أداة التحكم 
TextBox1‏ 


RadioButton1 


وال الثالث: أ أجب عن الأسئلة التالية مستعيئًا د 


-١ |‏ جملة التكرار المستخدمة في الكود هي 


"- إذا كانت قيمة (62 -6) فإن ناتج تنفيذ الكود هو 


Checked 


۲- سيتم تنفيذ الحلقة التكرارية طالما أن التعبير الشرطي 
۴- الغرض من الكود (2 + ¡ -1) هو 


a. يتم إظهار صندوق الرسالة وعليها النص "ناجح" عندما‎ -١ 
إذا كانت قيمة (40 = ») فإن ناتج تنفيذ الكود هو‎ -١ 


Dim N , أ‎ , Sum As Integer 
N = TextBox1.Text 
i=1 
Do While i <= N 
Sum = Sum + i 
i=i+2 


Loop 


Label1.Text = Sum 


If X >= 50 Then 
Msgbox ("ناجح")‎ 
End If 


( المدونات الإلكترونية #ععه|ا8 تعتبر من الوسائط الإلكترونية المستخدمة في التعدي الإلكتروني.‎ -١ 


-١ 1‏ الإجراء ممعم" مجموعة من الأوامر والتعليمات تحت اسم معين» يتم استدعائه بهذا الاسم لتنفيذ هذه الأوامر 
1 


والتعليمات ويعود بقيمة. ) ( 
ا ۳- للإعلان عن ثابت عجلة الجاذبية الأرضية نستخدم الكود 9.81 = اعم ا؟ A۶‏ 8 77أ0. ) 6 
٠ |‏ 4 الأخطاء المنطقية Logica Errors‏ هي أخطاء في الصيغة العامة لأوامر اللغة. ) ( 


السؤال الثاني: اختر الإجابة الصحيحة من بين الأقواس: 


-١‏ القيمة النهائية للمتغير ١‏ بعد تنفيذ المعادلة 4 * (2 / 16) + 2 * 5 = ١‏ هي 


۲- للإعلان عن متغير يكون معرف ومرئي لأي إجراء حدث يتم الإعلان عنه على مستوى 
(إجراء الحدث - التصنيف ۴٥۲٣‏ - الثابت 0514© - جميع ما سبق) 


)52-3.25-12-42( 


...... عندما يكون التفرع معتمدًا على قيمة متغير واحد وهناك عدة شروط كثيرة نستخدم الجملة‎ -'٠ 
(If ... Then ... Else — Select ... Case — If ... Then — For ... Next) 


4- عند تعريف متغير ليوضع فيه قيمة نوع الطالب (ذكر أم أنثى) يتم تعريفه من النوع 535 


ذال الثالث: اكتب ١‏ 


(Long — Boolean - Integer — String) 


-١‏ استخدام أسماء مستعارة تخفي شخصية المتعدي الإلكتروني بغرض عدم كشف أمره والإفلات من العقاب. 


؟- جملة تكرار تستخدم عند تكرار كود مله معين عدد محدد من المرات. 
-٣‏ ثابت حرفي يستخدم لإضافة رمز مفتاح الإدخال وسطر جديد. 


-٤‏ مجموعة من الأوامر تحت اسم معين يتم تطبيقها على مدخلات أو وسائط 63300646/5 وتعود بقيمة. 


Dim N As Long 
N = Me.Textbox1.text 
If N Mod 2 = 0 Then 
Me.Labe|1.1ex = "الرقم زوجي"‎ 
Else 
Me.Labe|1.1ھx‎ = "الرقم فردي"‎ 
End If 


M۵ -"‏ في الكود تشير إلى . 
۳- إذا كان 1 = 2 0۵ ١‏ فإن ناتج تنفيذ الكود 555 
-٤‏ إذا كان 50 = ١‏ فإن ناتج تنفيذ الكود E‏ 


( ) 
( ) 
( ) 
( ) 
4 
Dim N, i, sum As Integer 
N = Me.TextBox1. Text 
i=0 
Do While i <= N 
Sum = sum + i 
i=i+2 
Loop 


-١‏ الغرض من الكود هو نانج 


۲- تم استخدام جملة 


۳- سوف يتم عرض نتيجة تنفيذ الكود من خلال .. 


-٤‏ مقدرا الزيادة في 


التكرار .... 


MsgBox (sum) 


السؤال الأول: ضع علامة (ا) أمام العبارة ة وعلامة (»*أ ة الخطا: 


( يستخدم جملة 356 ... 56160 عندما يكون التقرع معتمد على قيمة متغير واحد وهناك شروط كثيرة.‎ -١ 
93/3016] عند الإعلان عن إجراء يمكن استخدام أكثر من‎ -١ 

"- تستخدم جملة مه 0ا ... ©10/811 00 لتكرار كود عدد من المرات غير معروفة نهايته مسقا 
4- الإعلان عن الدالة یبدا ب 100]عمدام وينتهي ب اء 600 

-١‏ في جملة )×1 ... ,50 اسم المتغير الذي يمثل العداد يجب أن يكون توعه رقمي. 

1- التهديد الإلكتروني يعتبر صورة من صور التعدي الإلكتروني. 


ال ال ال 


كانت قيمة الزيادة فإنه يمكن الاستغناء عن كتابة عن|ه/ا ۸۵۵ م©51. 
۱# صترب- (١‏ 


0۴ ... × في جملة‎ -١ 


۴- التعدي الإلكتروني يتم من خلال وساتط إلكترونية مثل .......... 
(البريد الإلكتروني - التشهير الإلكتروني - التهديد الإلكتروني) 
"- تعبر العلامة المنطفية .......... عن تساوي قيمتين في التعبير الشرطي. |  ><(‏ س = <) | 
-٤‏ ....... يمكن تخصيص قيم لها أثناء الإعلان وأثناء سير تنفيذ تعليمات البرنامج. 
(المتغيرات ‏ الثوابت - الدوال) 
«- تكرار كود معين لعدد من المرات يطلق عليه ........ (تعبير شرطي - حلقات تكرارية - دالة) 


....... اسم الطالب بيان من الفوع‎ -١ 
تاريخ الميلاد بيان من النوع‎ -۴ 
المجموع الكلي بيان من اللوع‎ -" 
... حالة الطالب بيان من الفوع‎ -4 
عدد المواد بيان من الفوع‎ ء١‎ 


السؤال الرابع الكود ثم أجب: 


کک 


-٤‏ إذا كانت قيمة 30 = ١‏ يكون ناتج تنفيذ الكود هو 
-٥‏ إذا كانت قيمة 60 = ١‏ يكون ناتج تنفيذ الكود هو ... 


Dim N As Single 
N = Me.TextBox1.Text 
If N >= 50 Then 


MsgBox ("ناجح")‎ 
Else 

MsgBox )"رسب"(‎ 
End If 


محافظة كفر الشيخ ۲٠١٠۲‏ 


55C۷ -١‏ يعتبر اسم متغير صحيح. 


۲- من قواعد الاستخدام الآمن للإنترنت عدم مقابلة شخص تعرفت عليه من خلال الإنترنت. 


۳- عند الإعلان عن إجراء يمكن استخدام أكثر من /ع03/3061. 


.83086 كل نوع بيان داخل ذاكرة الكمبيوتر له حد أقصى وحد أدنى من القيم يطلق عليها‎ -٤ 
يؤخذ على لغة ۷/8.۴۲ أنها سمحت للمبرمج الإعلان عن دوال وإجراءات أخرى يعدها بنفسه.‎ -5 


السؤال الثاني: أكمل العبارات الآتية: 


-١‏ الإعلان عن الدالة يبدأ ب 0610لا وينتهي ب 


۳- بعد تنفيذ المعادلة 2 / (4 + 2) - 12 = × القيمة النهائية للمتغير × هي ا 


5 .......... عبارة عن سلوك عدواني متعمد من شخص لآخر عبر وسائط الاتصال الإلكتروني. 


وال الثالث: أ- أجب عن الأسئلة التالية مستعين 


If X < 0 Then MsgBox (العدد موجب)‎ Else (العدد سالب) »“ام8ع1/158‎ 


-١‏ اكتب التعبير الشرطي في الجملة السابقة یی 
"- الكود الذي يتم تنفيذه عند تحقق الشرط هو eee‏ 


۳- الكود الذي يتم تنفيذه عند عدم تحقق الشرط هو 55 


mM: 


ب- أجب عن الأسئلة التالية مستعين بالكود الت 


Dim M As Integer 
For الا‎ - 270 10 


Me.TextBox1.Text = Me.TextBox1.Text & M 
Next M 


-١‏ معدل الزيادة في الحلقة التكرارية هو 8ك 
۲- اسم المتغير المستخدم في الحلقة التكرارية هو ا 
-٠‏ نوع المتغير المستخدم في الحلقة التكرارية هو ects‏ 

السؤال الرابع: اختر الإجابة | ة من بين الأقوا 
-١‏ قيمة عدد أفراد الأسرة يمكن تصنيفها كبيانات ....... (حرفية - رقمية صحيحة ‏ رقمية صحيحة) 
۲- لتكرار كود معين عدد من المرات غير معروف نهايته مسبقًا نستخدم تی 

(Do While ... Loop — For ... Next - If ... Then) 

- الثابت الحرفي .......... يستخدم لإضافة سطر جديد. (vbCrLf — Form — Button)‏ 
-٤‏ جملة .......... تستخدم عندما يكون التفرع معتمدًا على قيمة متغير واحد وهناك شروط كثيرة. 


(RadioButton — Event Procedures - Select ... Case) 
... د الخطأ الذي يظهر بعد تشغيل برنامج بلغة 1/8.07 يسمى‎ 


(Syntax Error - Logical Error — Runtime Error) 


وده دا دا کے کے کے کے د د د ے = 3 كت 


إرشادات الأسئلة والاختيارات 
أسئلة عامة 


السؤال الأول: ضع علامة )١/(‏ أمام العبارة الصحيحة وعلامة (*) أمام العبارة الخطأ: 


o XE NIT IY NNN معد كله .للد‎ VY x xe عله‎ KF عد كلد‎ 


x x-V كلد‎ N-o xé NIT x الجر‎ x x1۹ ۸ أ كلجا لالع‎ 


xf xf N NIA NPV x1 xo NE x NY xP N <-1 


oY 1-o xo) xo. x64 NEA NEV xé x-fo xé Né rN-é لكر‎ | 


املد xof‏ مهد x04 xo oV xo1‏ .كير 


السؤال الثانى: اختر الإجابة المناسبة لكل مما يلى: 
ادب كدج ۳أ ٤ج‏ هأ كدب ۷ج ۸ج |١‏ ١٠اب‏ ادج |١٣ |١١‏ ٤١ا‏ 
دب كتدج ۷ج كلدب 1-1۹ °| IY IY‏ لادج 4 ماج LV I‏ 


لاب الدج “جب االكب لادب الدب 


إرشادات اللاختبارات 


U_Gender = False -Y U_Name = TextBox1.Text -١ 


وال الثالث: أ- أجب عن الأسئلة التالية مستعينًا 


¡ إضافة ۲ إلى قيمة المتغير‎ -۳ True -Y Do While ... Loop -١ 


ب- أجب عن الأسئلة التالية مستعينًا بالكود الآت 


50 تكون قيمة × أكبر من أو تساوي‎ -١ 
ا لا تظهر أي رسائل‎ 
يظهر صندوق رسالة به كلمة (ناجح)‎ - 


¡ السؤال الأول: ضع علامة )١/(‏ أمام العبارة الصحيحة وعلامة (*) أمام العبارة غير الصحيحة: 


x 6 x x -۲ لو‎ ١ 


Boolean ؟-‎ Select ... Case - ۴٥۲۳ التصنيف‎ -١ 17-١ 
العلمى الدال على كل عبارة مما يلى:‎ ١ أ السؤال الثالث: اكتب‎ 
Function الدوال‎ -5 vbCrLf ؟-‎ For ... Next -" التخفي الإلكتروني‎ -١ 


زال الرابع: أجب عن الأسئلة التالية بعد 


ا 0( (ب) 

أ | -١‏ الرقمي الصحيح ع10۸ -١‏ مجموع الأعداد الزوجية من 0 إلى المتغير ١‏ 
1 "- نافذة النموذج الحالية "- Do While ... Loop‏ 

| | ؟- الرقم فردي - صندوق رسالة 

| | 4- الرقم زوجي كن 


ظ 


-١‏ لو % نك 5 x‏ هه 5- له 


-١ ١+ ١‏ البريد الإلكتروني ‏ 5 - -٤‏ الدوال ١‏ - حلقات تكرارية 


وال الثالث: أجب عن الأسئلة التالية مستعيئًا بالشكل الت 


Boolean متنوع‎ -٤ عددي غير صحيح 6ا5108‎ -٣ Date تاريخ‎ -١ 5]108 حرفي‎ -١ 
1 |nteger عدد صحيح‎ ۔٥‎ 


أ السؤال الرابع: اقرأ الكود ثم أجب: 
[ 


Then ... Else ۱ 1‏ ...عا -١‏ عددي غير صحيح ماع¡ ۳- نافذة النموذج الحالية 
-٤‏ صندوق رسالة (راسب) -١‏ صندوق رسالة (ناجح) 


ص 


وص کا 3 = دده = 6 ص احاح 


٠١٠۲ محافظة كفر الشيخ‎ ١ 


1 السؤال الأول: ضع علامة (1) أمام العبارة الصحيحة وعلامة (*) أمام العبارة غير الصحيحة: 


-٤ 1-۳ Dim -Y End Function -١‏ التعدي الإلكتروني 


وال الثالث: أ- أجب عن الأسئلة التالية مستعين ب 
Ke =‏ ۲- صندوق رسالة (العدد موجب) ۳- صندوق رسالة العدد (سالب) 


ب- أجب عن الأسئلة التالية مستعين الكود الت 


١ + -١‏ لعدم كتابة م516 ؟- اما -٣‏ عددي صحيح /ع10168 


وال الراب 


Select ... Case -6 vbCrLf ؟-‎ Do While ... Loop رقيمة صحيحة ؟-‎ -١ 


Runtime Error -® 


